CAAPlanetPerihelionAphelion_VenusPerihelion <-
function(k){
.Call("CAAPlanetPerihelionAphelion_VenusPerihelion", k)
}
